﻿Public Class frmMenu
    Dim frmL As New frmLauncher
    Private Sub frmMenu_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Try
            Me.Location = New Point(frmLauncher.posX, frmLauncher.posY)
        Catch ex As Exception

        End Try
    End Sub

    Private Sub frmMenu_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
        Try
            If e.KeyCode = Keys.Escape Then
                Me.Close()
            End If
        Catch ex As Exception

        End Try
    End Sub

    Private Sub frmMenu_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        'frmL.pboxMenu.BackColor = Color.DodgerBlue
    End Sub

   
    Private Sub ComboBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles ComboBox1.KeyDown

    End Sub
End Class